From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 9 Nov 2021 04:48:28 +0000 (+0100)
Subject: Make xwidget-event-handler more resilient
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~4110^2~56
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=272693c6fd2d1a6546d5362c30dc8c68247f44de;p=emacs.git

Make xwidget-event-handler more resilient

* lisp/xwidget.el (xwidget-event-handler): Don't try to call the
callback if it hasn't been defined.
---

diff --git a/lisp/xwidget.el b/lisp/xwidget.el
index 91d02e8fcea..dc1ed2dc087 100644
--- a/lisp/xwidget.el
+++ b/lisp/xwidget.el
@@ -348,7 +348,8 @@ If N is omitted or nil, scroll backwards by one char."
       ((xwidget-event-type (nth 1 last-input-event))
        (xwidget (nth 2 last-input-event))
        (xwidget-callback (xwidget-get xwidget 'callback)))
-    (funcall xwidget-callback xwidget xwidget-event-type)))
+    (when xwidget-callback
+      (funcall xwidget-callback xwidget xwidget-event-type))))
 
 (defun xwidget-webkit-callback (xwidget xwidget-event-type)
   "Callback for xwidgets.